Integrand size = 36, antiderivative size = 99 \[ \int \frac {\sec (e+f x) (a+a \sec (e+f x))^{3/2}}{(c-c \sec (e+f x))^{3/2}} \, dx=-\frac {a \sqrt {a+a \sec (e+f x)} \tan (e+f x)}{f (c-c \sec (e+f x))^{3/2}}-\frac {a^2 \log (1-\sec (e+f x)) \tan (e+f x)}{c f \sqrt {a+a \sec (e+f x)} \sqrt {c-c \sec (e+f x)}} \]
-a*(a+a*sec(f*x+e))^(1/2)*tan(f*x+e)/f/(c-c*sec(f*x+e))^(3/2)-a^2*ln(1-sec (f*x+e))*tan(f*x+e)/c/f/(a+a*sec(f*x+e))^(1/2)/(c-c*sec(f*x+e))^(1/2)
Time = 0.59 (sec) , antiderivative size = 70, normalized size of antiderivative = 0.71 \[ \int \frac {\sec (e+f x) (a+a \sec (e+f x))^{3/2}}{(c-c \sec (e+f x))^{3/2}} \, dx=-\frac {a^2 \left (\log (1-\sec (e+f x))-\frac {2}{-1+\sec (e+f x)}\right ) \tan (e+f x)}{c f \sqrt {a (1+\sec (e+f x))} \sqrt {c-c \sec (e+f x)}} \]
-((a^2*(Log[1 - Sec[e + f*x]] - 2/(-1 + Sec[e + f*x]))*Tan[e + f*x])/(c*f* Sqrt[a*(1 + Sec[e + f*x])]*Sqrt[c - c*Sec[e + f*x]]))
Time = 0.57 (sec) , antiderivative size = 99, normalized size of antiderivative = 1.00, number of steps used = 4, number of rules used = 4, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.111, Rules used = {3042, 4442, 3042, 4440}
Below are the steps used by Rubi to obtain the solution. The rule number used for the transformation is given above next to the arrow. The rules definitions used are listed below.
\(\displaystyle \int \frac {\sec (e+f x) (a \sec (e+f x)+a)^{3/2}}{(c-c \sec (e+f x))^{3/2}} \, dx\) |
\(\Big \downarrow \) 3042 |
\(\displaystyle \int \frac {\csc \left (e+f x+\frac {\pi }{2}\right ) \left (a \csc \left (e+f x+\frac {\pi }{2}\right )+a\right )^{3/2}}{\left (c-c \csc \left (e+f x+\frac {\pi }{2}\right )\right )^{3/2}}dx\) |
\(\Big \downarrow \) 4442 |
\(\displaystyle -\frac {a \int \frac {\sec (e+f x) \sqrt {\sec (e+f x) a+a}}{\sqrt {c-c \sec (e+f x)}}dx}{c}-\frac {a \tan (e+f x) \sqrt {a \sec (e+f x)+a}}{f (c-c \sec (e+f x))^{3/2}}\) |
\(\Big \downarrow \) 3042 |
\(\displaystyle -\frac {a \int \frac {\csc \left (e+f x+\frac {\pi }{2}\right ) \sqrt {\csc \left (e+f x+\frac {\pi }{2}\right ) a+a}}{\sqrt {c-c \csc \left (e+f x+\frac {\pi }{2}\right )}}dx}{c}-\frac {a \tan (e+f x) \sqrt {a \sec (e+f x)+a}}{f (c-c \sec (e+f x))^{3/2}}\) |
\(\Big \downarrow \) 4440 |
\(\displaystyle -\frac {a^2 \tan (e+f x) \log (1-\sec (e+f x))}{c f \sqrt {a \sec (e+f x)+a} \sqrt {c-c \sec (e+f x)}}-\frac {a \tan (e+f x) \sqrt {a \sec (e+f x)+a}}{f (c-c \sec (e+f x))^{3/2}}\) |
-((a*Sqrt[a + a*Sec[e + f*x]]*Tan[e + f*x])/(f*(c - c*Sec[e + f*x])^(3/2)) ) - (a^2*Log[1 - Sec[e + f*x]]*Tan[e + f*x])/(c*f*Sqrt[a + a*Sec[e + f*x]] *Sqrt[c - c*Sec[e + f*x]])
3.2.18.3.1 Defintions of rubi rules used
Int[(csc[(e_.) + (f_.)*(x_)]*Sqrt[csc[(e_.) + (f_.)*(x_)]*(d_.) + (c_)])/Sq rt[csc[(e_.) + (f_.)*(x_)]*(b_.) + (a_)], x_Symbol] :> Simp[a*c*Log[1 + (b/ a)*Csc[e + f*x]]*(Cot[e + f*x]/(b*f*Sqrt[a + b*Csc[e + f*x]]*Sqrt[c + d*Csc [e + f*x]])), x] /; FreeQ[{a, b, c, d, e, f}, x] && EqQ[b*c + a*d, 0] && Eq Q[a^2 - b^2, 0]
Int[csc[(e_.) + (f_.)*(x_)]*(csc[(e_.) + (f_.)*(x_)]*(b_.) + (a_))^(m_)*(cs c[(e_.) + (f_.)*(x_)]*(d_.) + (c_))^(n_.), x_Symbol] :> Simp[2*a*c*Cot[e + f*x]*(a + b*Csc[e + f*x])^m*((c + d*Csc[e + f*x])^(n - 1)/(b*f*(2*m + 1))), x] - Simp[d*((2*n - 1)/(b*(2*m + 1))) Int[Csc[e + f*x]*(a + b*Csc[e + f* x])^(m + 1)*(c + d*Csc[e + f*x])^(n - 1), x], x] /; FreeQ[{a, b, c, d, e, f }, x] && EqQ[b*c + a*d, 0] && EqQ[a^2 - b^2, 0] && IGtQ[n - 1/2, 0] && LtQ[ m, -2^(-1)]
Leaf count of result is larger than twice the leaf count of optimal. \(198\) vs. \(2(91)=182\).
Time = 3.40 (sec) , antiderivative size = 199, normalized size of antiderivative = 2.01
method | result | size |
default | \(-\frac {a \left (\cos \left (f x +e \right ) \ln \left (-\cot \left (f x +e \right )+\csc \left (f x +e \right )-1\right )+\cos \left (f x +e \right ) \ln \left (-\cot \left (f x +e \right )+\csc \left (f x +e \right )+1\right )-2 \cos \left (f x +e \right ) \ln \left (-\cot \left (f x +e \right )+\csc \left (f x +e \right )\right )-\ln \left (-\cot \left (f x +e \right )+\csc \left (f x +e \right )-1\right )-\ln \left (-\cot \left (f x +e \right )+\csc \left (f x +e \right )+1\right )+2 \ln \left (-\cot \left (f x +e \right )+\csc \left (f x +e \right )\right )-\cos \left (f x +e \right )-1\right ) \sqrt {a \left (\sec \left (f x +e \right )+1\right )}\, \tan \left (f x +e \right )}{f \sqrt {-c \left (\sec \left (f x +e \right )-1\right )}\, \left (\sec \left (f x +e \right )-1\right ) c \left (\cos \left (f x +e \right )+1\right )}\) | \(199\) |
risch | \(\frac {i a \sqrt {\frac {a \left ({\mathrm e}^{i \left (f x +e \right )}+1\right )^{2}}{1+{\mathrm e}^{2 i \left (f x +e \right )}}}\, \left (2 \,{\mathrm e}^{2 i \left (f x +e \right )} \ln \left ({\mathrm e}^{i \left (f x +e \right )}-1\right )-{\mathrm e}^{2 i \left (f x +e \right )} \ln \left (1+{\mathrm e}^{2 i \left (f x +e \right )}\right )-4 \,{\mathrm e}^{i \left (f x +e \right )} \ln \left ({\mathrm e}^{i \left (f x +e \right )}-1\right )+2 \,{\mathrm e}^{i \left (f x +e \right )} \ln \left (1+{\mathrm e}^{2 i \left (f x +e \right )}\right )+4 \,{\mathrm e}^{i \left (f x +e \right )}+2 \ln \left ({\mathrm e}^{i \left (f x +e \right )}-1\right )-\ln \left (1+{\mathrm e}^{2 i \left (f x +e \right )}\right )\right )}{c \left ({\mathrm e}^{i \left (f x +e \right )}+1\right ) \left ({\mathrm e}^{i \left (f x +e \right )}-1\right ) \sqrt {\frac {c \left ({\mathrm e}^{i \left (f x +e \right )}-1\right )^{2}}{1+{\mathrm e}^{2 i \left (f x +e \right )}}}\, f}\) | \(229\) |
-1/f*a*(cos(f*x+e)*ln(-cot(f*x+e)+csc(f*x+e)-1)+cos(f*x+e)*ln(-cot(f*x+e)+ csc(f*x+e)+1)-2*cos(f*x+e)*ln(-cot(f*x+e)+csc(f*x+e))-ln(-cot(f*x+e)+csc(f *x+e)-1)-ln(-cot(f*x+e)+csc(f*x+e)+1)+2*ln(-cot(f*x+e)+csc(f*x+e))-cos(f*x +e)-1)*(a*(sec(f*x+e)+1))^(1/2)/(-c*(sec(f*x+e)-1))^(1/2)/(sec(f*x+e)-1)/c /(cos(f*x+e)+1)*tan(f*x+e)
\[ \int \frac {\sec (e+f x) (a+a \sec (e+f x))^{3/2}}{(c-c \sec (e+f x))^{3/2}} \, dx=\int { \frac {{\left (a \sec \left (f x + e\right ) + a\right )}^{\frac {3}{2}} \sec \left (f x + e\right )}{{\left (-c \sec \left (f x + e\right ) + c\right )}^{\frac {3}{2}}} \,d x } \]
integral((a*sec(f*x + e)^2 + a*sec(f*x + e))*sqrt(a*sec(f*x + e) + a)*sqrt (-c*sec(f*x + e) + c)/(c^2*sec(f*x + e)^2 - 2*c^2*sec(f*x + e) + c^2), x)
\[ \int \frac {\sec (e+f x) (a+a \sec (e+f x))^{3/2}}{(c-c \sec (e+f x))^{3/2}} \, dx=\int \frac {\left (a \left (\sec {\left (e + f x \right )} + 1\right )\right )^{\frac {3}{2}} \sec {\left (e + f x \right )}}{\left (- c \left (\sec {\left (e + f x \right )} - 1\right )\right )^{\frac {3}{2}}}\, dx \]
Time = 0.32 (sec) , antiderivative size = 122, normalized size of antiderivative = 1.23 \[ \int \frac {\sec (e+f x) (a+a \sec (e+f x))^{3/2}}{(c-c \sec (e+f x))^{3/2}} \, dx=\frac {\frac {\sqrt {-a} a \log \left (\frac {\sin \left (f x + e\right )}{\cos \left (f x + e\right ) + 1} + 1\right )}{c^{\frac {3}{2}}} + \frac {\sqrt {-a} a \log \left (\frac {\sin \left (f x + e\right )}{\cos \left (f x + e\right ) + 1} - 1\right )}{c^{\frac {3}{2}}} - \frac {2 \, \sqrt {-a} a \log \left (\frac {\sin \left (f x + e\right )}{\cos \left (f x + e\right ) + 1}\right )}{c^{\frac {3}{2}}} + \frac {\sqrt {-a} a {\left (\cos \left (f x + e\right ) + 1\right )}^{2}}{c^{\frac {3}{2}} \sin \left (f x + e\right )^{2}}}{f} \]
(sqrt(-a)*a*log(sin(f*x + e)/(cos(f*x + e) + 1) + 1)/c^(3/2) + sqrt(-a)*a* log(sin(f*x + e)/(cos(f*x + e) + 1) - 1)/c^(3/2) - 2*sqrt(-a)*a*log(sin(f* x + e)/(cos(f*x + e) + 1))/c^(3/2) + sqrt(-a)*a*(cos(f*x + e) + 1)^2/(c^(3 /2)*sin(f*x + e)^2))/f
\[ \int \frac {\sec (e+f x) (a+a \sec (e+f x))^{3/2}}{(c-c \sec (e+f x))^{3/2}} \, dx=\int { \frac {{\left (a \sec \left (f x + e\right ) + a\right )}^{\frac {3}{2}} \sec \left (f x + e\right )}{{\left (-c \sec \left (f x + e\right ) + c\right )}^{\frac {3}{2}}} \,d x } \]
Timed out. \[ \int \frac {\sec (e+f x) (a+a \sec (e+f x))^{3/2}}{(c-c \sec (e+f x))^{3/2}} \, dx=\int \frac {{\left (a+\frac {a}{\cos \left (e+f\,x\right )}\right )}^{3/2}}{\cos \left (e+f\,x\right )\,{\left (c-\frac {c}{\cos \left (e+f\,x\right )}\right )}^{3/2}} \,d x \]